home *** CD-ROM | disk | FTP | other *** search
/ Software of the Month Club 1999 July / Software of the Month - Ultimate Collection Shareware 263.iso / pc / Xtras / Widget Wizard / -INSTRCT.DIR / 00014_Script_14 < prev   
Text File  |  1997-05-10  |  719b  |  24 lines
  1. on stuffInstructions
  2.   --  set gInstructions = "Step" && gInstructStep && "of" && gInstructTotal & RETURN & RETURN & item gInstructStep of gInstructionsList
  3.   --  --  put gInstructions --DEBUG
  4.   --  
  5.   --  tell gInstructionWindow
  6.   --    put gInstructions into field "InstructionText"
  7.   --  end tell
  8. end stuffInstructions
  9.  
  10.  
  11. on resetInstructText
  12.   --  set gInstructStep = 1
  13.   --  set myOldDelimiter = the itemDelimiter
  14.   --  set the itemDelimiter = "|"
  15.   --  set gInstructTotal = the number of items in gInstructionsList
  16.   --  
  17.   --  stuffInstructions
  18.   --  
  19.   --  tell gInstructionWindow
  20.   --    setButtons
  21.   --  end tell
  22.   --  
  23.   --  set the itemDelimiter = myOldDelimiter
  24. end resetInstructText